home *** CD-ROM | disk | FTP | other *** search
/ Multimedia Business 500 #2 / Multimedia Business 500 - Release 2.iso / prodigy / script.r_ / script.r
Text File  |  1994-11-01  |  408b  |  24 lines
  1. /* 6/04/93 */
  2. /* Tymnet connect script 9600 */
  3. sleep {27}
  4. sendln {}
  5. sleep {1}
  6. sendln {}
  7. sleep {10}
  8. set_retries 6
  9. :START
  10. send {a}
  11. set_timeout 18
  12. receive {please log in:} goto SENDLOGIN
  13. retry START
  14. return 29  {No response from TYMNET}
  15. :SENDLOGIN
  16. set_retries 14
  17. :SENDLOGIN1
  18. sendln {prodigy}
  19. set_timeout 50
  20. receive {connect} goto END
  21. retry SENDLOGIN1
  22. return 46  {Can not access host}
  23. :END
  24.